function [discount,beca,stipend] = u26_2012(math,lang,demrecode)
%% Universidad de Playa Ancha de Ciencias de la Educaci'on
lm=(math+lang)/2;
beca=zeros(size(lm,1),1);
stipend=zeros(size(lm,1),1);

%Beca Universidad de Playa Ancha
discount=lm>=700;

%BVP
if demrecode==26040 || demrecode==26030 || demrecode==26010 || demrecode==26009 || demrecode==26066 || demrecode==26070 || demrecode==26060 || demrecode==26005 || demrecode==26006 || demrecode==26007 || demrecode==26008 || demrecode==26047 || demrecode==26045 || demrecode==26000 || demrecode==26004 || demrecode==26055 || demrecode==26098 || demrecode==26050 || demrecode==26059 || demrecode==26025 || demrecode==26073 || demrecode==26072 || demrecode==26043
    [auxdiscount,stipend]=bvp(lm);
    discount=max(discount,auxdiscount);
end

end
